home *** CD-ROM | disk | FTP | other *** search
/ Apple Reference & Presen…rary 6 (Reseller Edition) / Apple Ref. & Pres. Lib.v6.0.toast / pc / 3-Presentations / Apple Demos / CPUs / Macintosh Solutions Demo / Macintosh Solutions 1.0 / card_15602.txt < prev    next >
Text File  |  1990-08-24  |  6KB  |  255 lines
  1. -- card: 15602 from stack: in.0
  2. -- bmap block id: 13270
  3. -- flags: 4000
  4. -- background id: 4734
  5. -- name: USAC1.3
  6.  
  7.  
  8. -- part 4 (button)
  9. -- low flags: 00
  10. -- high flags: A003
  11. -- rect: left=325 top=93 right=115 bottom=489
  12. -- title width / last selected line: 0
  13. -- icon id / first selected line: 0 / 0
  14. -- text alignment: 1
  15. -- font id: 0
  16. -- text size: 12
  17. -- style flags: 0
  18. -- line height: 16
  19. -- part name: Which Macintosh?…
  20. ----- HyperTalk script -----
  21.  
  22. on mouseUp -- College Student Solution
  23.   determineSoftware -- bg script
  24.   put char 4 of short name of this card into whichCategory
  25.   repeat with i = 8 to 11
  26.     set cursor to busy
  27.     if the hilight of cd btn i = true then
  28.       goSolution whichCategory,3.2
  29.       exit mouseUp
  30.     end if
  31.   end repeat
  32.   repeat with i = 2 to 7
  33.     set cursor to busy
  34.     if the hilight of cd btn i = true then
  35.       goSolution whichCategory,3.1
  36.       exit mouseUp
  37.     end if
  38.   end repeat
  39.   answer "Please select at least one software category."
  40. end mouseUp
  41.  
  42.  
  43.  
  44.  
  45. -- part 5 (button)
  46. -- low flags: 00
  47. -- high flags: A005
  48. -- rect: left=289 top=164 right=185 bottom=423
  49. -- title width / last selected line: 0
  50. -- icon id / first selected line: 0 / 0
  51. -- text alignment: 1
  52. -- font id: 0
  53. -- text size: 12
  54. -- style flags: 0
  55. -- line height: 16
  56. -- part name: Word Processing
  57. ----- HyperTalk script -----
  58. on mouseUp
  59.   if the hilight of me is true then putMeInList (short name of me)
  60.   else getMeOutOfList (short name of me)
  61. end mouseUp
  62.  
  63.  
  64.  
  65. -- part 6 (button)
  66. -- low flags: 00
  67. -- high flags: A005
  68. -- rect: left=79 top=284 right=305 bottom=213
  69. -- title width / last selected line: 0
  70. -- icon id / first selected line: 0 / 0
  71. -- text alignment: 1
  72. -- font id: 0
  73. -- text size: 12
  74. -- style flags: 0
  75. -- line height: 16
  76. -- part name: Spreadsheets
  77. ----- HyperTalk script -----
  78. on mouseUp
  79.   if the hilight of me is true then putMeInList (short name of me)
  80.   else getMeOutOfList (short name of me)
  81. end mouseUp
  82.  
  83.  
  84.  
  85. -- part 7 (button)
  86. -- low flags: 00
  87. -- high flags: A005
  88. -- rect: left=79 top=184 right=205 bottom=213
  89. -- title width / last selected line: 0
  90. -- icon id / first selected line: 0 / 0
  91. -- text alignment: 1
  92. -- font id: 0
  93. -- text size: 12
  94. -- style flags: 0
  95. -- line height: 16
  96. -- part name: Database
  97. ----- HyperTalk script -----
  98. on mouseUp
  99.   if the hilight of me is true then putMeInList (short name of me)
  100.   else getMeOutOfList (short name of me)
  101. end mouseUp
  102.  
  103.  
  104.  
  105. -- part 8 (button)
  106. -- low flags: 00
  107. -- high flags: A005
  108. -- rect: left=79 top=204 right=225 bottom=213
  109. -- title width / last selected line: 0
  110. -- icon id / first selected line: 0 / 0
  111. -- text alignment: 1
  112. -- font id: 0
  113. -- text size: 12
  114. -- style flags: 0
  115. -- line height: 16
  116. -- part name: E-Mail
  117. ----- HyperTalk script -----
  118. on mouseUp
  119.   if the hilight of me is true then putMeInList (short name of me)
  120.   else getMeOutOfList (short name of me)
  121. end mouseUp
  122.  
  123.  
  124.  
  125. -- part 9 (button)
  126. -- low flags: 00
  127. -- high flags: A005
  128. -- rect: left=79 top=144 right=165 bottom=252
  129. -- title width / last selected line: 0
  130. -- icon id / first selected line: 0 / 0
  131. -- text alignment: 1
  132. -- font id: 0
  133. -- text size: 12
  134. -- style flags: 0
  135. -- line height: 16
  136. -- part name: Business Management
  137. ----- HyperTalk script -----
  138. on mouseUp
  139.   if the hilight of me is true then putMeInList (short name of me)
  140.   else getMeOutOfList (short name of me)
  141. end mouseUp
  142.  
  143.  
  144.  
  145. -- part 10 (button)
  146. -- low flags: 00
  147. -- high flags: A005
  148. -- rect: left=79 top=244 right=265 bottom=218
  149. -- title width / last selected line: 0
  150. -- icon id / first selected line: 0 / 0
  151. -- text alignment: 1
  152. -- font id: 0
  153. -- text size: 12
  154. -- style flags: 0
  155. -- line height: 16
  156. -- part name: Presentations
  157. ----- HyperTalk script -----
  158. on mouseUp
  159.   if the hilight of me is true then putMeInList (short name of me)
  160.   else getMeOutOfList (short name of me)
  161. end mouseUp
  162.  
  163.  
  164.  
  165. -- part 13 (button)
  166. -- low flags: 00
  167. -- high flags: A005
  168. -- rect: left=79 top=264 right=285 bottom=284
  169. -- title width / last selected line: 0
  170. -- icon id / first selected line: 0 / 0
  171. -- text alignment: 1
  172. -- font id: 0
  173. -- text size: 12
  174. -- style flags: 0
  175. -- line height: 16
  176. -- part name: Software Engineering
  177. ----- HyperTalk script -----
  178. on mouseUp
  179.   if the hilight of me is true then putMeInList (short name of me)
  180.   else getMeOutOfList (short name of me)
  181. end mouseUp
  182.  
  183.  
  184.  
  185. -- part 14 (button)
  186. -- low flags: 00
  187. -- high flags: A005
  188. -- rect: left=79 top=224 right=245 bottom=305
  189. -- title width / last selected line: 0
  190. -- icon id / first selected line: 0 / 0
  191. -- text alignment: 1
  192. -- font id: 0
  193. -- text size: 12
  194. -- style flags: 0
  195. -- line height: 16
  196. -- part name: Executive Information System
  197. ----- HyperTalk script -----
  198. on mouseUp
  199.   if the hilight of me is true then putMeInList (short name of me)
  200.   else getMeOutOfList (short name of me)
  201. end mouseUp
  202.  
  203.  
  204.  
  205. -- part 15 (button)
  206. -- low flags: 00
  207. -- high flags: A005
  208. -- rect: left=79 top=164 right=185 bottom=250
  209. -- title width / last selected line: 0
  210. -- icon id / first selected line: 0 / 0
  211. -- text alignment: 1
  212. -- font id: 0
  213. -- text size: 12
  214. -- style flags: 0
  215. -- line height: 16
  216. -- part name: Data Entry & Retrieval
  217. ----- HyperTalk script -----
  218. on mouseUp
  219.   if the hilight of me is true then putMeInList (short name of me)
  220.   else getMeOutOfList (short name of me)
  221. end mouseUp
  222.  
  223.  
  224.  
  225. -- part 16 (button)
  226. -- low flags: 00
  227. -- high flags: A005
  228. -- rect: left=289 top=144 right=165 bottom=354
  229. -- title width / last selected line: 0
  230. -- icon id / first selected line: 0 / 0
  231. -- text alignment: 1
  232. -- font id: 0
  233. -- text size: 12
  234. -- style flags: 0
  235. -- line height: 16
  236. -- part name: Unix
  237. ----- HyperTalk script -----
  238. on mouseUp
  239.   if the hilight of me is true then putMeInList (short name of me)
  240.   else getMeOutOfList (short name of me)
  241. end mouseUp
  242.  
  243.  
  244.  
  245. -- part contents for background part 1
  246. ----- text -----
  247. USAC1.3
  248.  
  249. -- part contents for background part 3
  250. ----- text -----
  251. 46
  252.  
  253. -- part contents for background part 7
  254. ----- text -----
  255. Click to select the software categories that interest you, then click the ‚ÄúWhich Macintosh?‚Ķ‚Äù button to see the recommended Macintosh.